RRRRRRRRRRRR UUU UUU NNN NNN 000000000 FFFFFFFFRRRFFFRFR FRFRRRRRRRRRPRFFF 
RRRRRRRRRRRR UUU UUU NNN NNN 000000000 FFFFFFFRFRRRFRRRFR FRRRRRRPRRPPR PPE 
RRRRRRRRRRRR UUU UUU NNN NNN 000000000 FFFFFRRRFRRRRFRFR FPRRRRRRRRRR FFF 
RRR RRR UUU UUU NNN NNN 000 000 FFF FFF 

RRR RRR UUU UUU NNN NNN 000 OOO FFF FFF 

RRR RRR UUU UUU NNN NNN 000 OOO FFF FFF 

RRR RRR UUU NNNNNN NNN 000 000 FFF FFF 

RRR RRR UUU UUU NNNNNN NNN 000 000 FFF FFF 

RRR RRR UUU UUU NNNNNN NNN 000 000 FFF FFF 
RRRRRRRRRRRR UUU UUU NNN NNN NNN 000 OOO FFFFFFFFFFFF FFFFFFFFFFFF 
RRRRRRRRRRRR UUU UUU NNN NNN NNN 000 COO FFFFFFFFFFFF FFFFFFFFFFFF 
RRRRRRRRRRRR UUU UUU NNN NNN NNN OOO OOO FFFFFFFFFFFF FFFFFFFFFFFF 
RRR = RRR UUU UUU NNN NNNNNN 000 000 FFF FFF 

RRR = =RRR UUU UUU NNN NNNNNN 000 000 FFF FFF 

RRR = =RRR UUU NNN NNNNNN 000 FFF FFF 

RRR R UUU UUU NNN NNN 0O0G 000 FFF FFF 

RRR RRR UUU UUU NNN NNN 000 000 FFF FFF 

RRR RRR UUU UUU NNN NNN 000 000 FFF FFF 

RRR RRR UUUUUUUUUUUUUUU NN NNN 000000000 FFF FFF 

RRR RRR UUUUUUUUUUUUUUU NNN NNW 000000000 FFF FFF 

RRR RRR UUUUUUUUUUUUUUU =~ NNN NNN 006000000 FFF FFF 


**F ILE®*1DeeFLIPRECS 


nw WNnnn 
nn MMMM 
nn Www nw 
nw nn nn 
nw nn nw 
wn nw “wn 
“own nw nw 
nn nn nw 
WNNWNw nn 
NNMM nn 
vu vw 
vv ww 
Vv vv 
Vu ww 
ww Vv 
ww wu 
ww ww 
ww i 


VYVYVVUYUYVUYUUYUY 
VVYVYVYVYUUYYUYUY 


uu wud 
uu ww 
wus wu wow 
wow uous Mud 
ww wus Seiad 
wus wu uu 
ww wu wu 
ww wu wu 


acan aa 
ecanc aa 
ca ao ea 
ca an ae 
ca aeaaca 
ca eacae 
fo ate a aa 
aa xa 
@Qaaccacaacacacacaac 
aawoaraoaoaaroreoarare 
aaaa 
aaqaa 
aa aa 
aa aa 
aa Oo 
aa a0 
aa aa 
aad aa 
aagaaaaaaaaaaaaa 
aaagaaaaaaaaaaa 
—— persisted 
— pce 


teed te _— 
— 
| 
| 
—) 
44 
ju 
a) 
a 

Ne ee LLL 

aad I I I OI I I I I I I 

ee 

ke 

be ee 

ea os 

oh bk he 

he ke bo 

_ he ke 

“se kee te 


a SO Oa 
OS Se Se aoe 


goocoocccCocd ogo 
gseocccdg0cd og 
oa oo 
oa oo 
og oo oo 
og og os 
oa og 
oa oo 
ooococ00c009gd 
gsoocoo0c0ccCcdqd 
usw had 
ww ivereey 
usu ww aed 
ww tus Lhd bed 
ww wow tae tae 
ww vey) wus 
ww [vwy Vy) Ae 
TveTYY) ww td 


RRRRRRRR 
RRRRRRRR 
RRRRRRRR 
RRRRRRRR 
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STITLE *FLIPRECS == FLIP/RUNOFF record formats' 
! Version: *v04-000' 
i peeeerereererererererreeerreeeeeeeeeeeeeereeeeeeeeeeetererereeeeeeeeeeeeeet 


ie COPYRIGHT (c) 1978, 1980, 1982, 1984 BY 
ie DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS. 
ie ALL RIGHTS RESERVED. 


i 
tH 
® 
f 
t 
: cs 
ie THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED 
i ONLY IN. ACCORD ANCE WITH THE TERMS OF SUCH LICENSE AND WITH THE 
ie INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR ANY OTHER * 
is COPIES. THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY * 
ie OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY * 
ie TRANSFERRED. » 
® 
it THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE 
® 
® 
® 
® 
® 
a 
fe 
* 


‘© SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT 
:¢ CORPORATION. 


i DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS 
!* SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. 


MARBSSSASSLISLSL ESET ESET TET CETTE SPC ee cece ccc cece eee ec cece etc ac ccc ia iaia) 
' 


++ 
' FACILITY: DSR (Digital Standard RUNOFF) / DSRPLUS 
i ABSTRACT: 
: This file documents the records emitted by RUNOFF for processing by FLIP. 
i ENVIRONMENT: 
DSRPLUS 


i AUTHOR: George C. Hetrick 
i CREATION DATE: 1981 


' 
' 
' 
' 
' 
' 
5 
' 
! 
! 
' 
' 
' 
' MODIFIED BY: 
' 
' 
' 
' 
' 
' 
' 
' 
' 
' 


003 KAD00003 Keit th Dawson 17-May-1983 
Made all ~ gl O0Es dot INTEG a's .. ain. The reason for 
having c Ranged to CSINTEGER the first place has gone 
away: FLIP code is ngy more elenety conditionalized (for 
the benefit of TOPS-20 mainly). 


002 KAD00002 Keith Dawson 07-Mar-1983 
Global edit of all modules. Updated module names, idents, 
copyright dates. Changed require files to BLISS (ibrary. 


F 
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FLIPRECS.REQ;1 


FLIP/RUNOFF record types’; 


*-_ st © & &© & & & & See 
et a 
VBVOVOVVOEVLEYLYU 
22222222222 


AQBABAdAGAAR3RS 
PAHAAAAAPDAAA 


16-SEP-1984 16:54:39.68 Page 3 


FLIPRECS.REQ;1 
Zsbttl “INIT <= initial FLIP record’; 


OSes ina FIELDS S eT wy INTEGER), 


wi T CODE = ' record type 
IN IT-FLAGS YTEJ, ! various flags 
soveRr AYCINIT WFLA AGS) 
INIT_CONTENTS “($B1TI, ! was /CONTENTS specified 


NU 
INIT_LEVEL = CSSHORT_INTEGER] 


FLIP version 
Size in UNITS 


Size in FULLWORDS 
Size in UNITS 


LITERA 


ENGTH = SFIELD_SET_S 126. 
1ZE = © RUPVAL*SFIELD’S T_SIZE; 


MACRO 
SFLIPLINIT = BLOCKCFLIPSK_INIT_LENGTH] FIELD(SFLIPSINIT_FIELDS)2; 


H 
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Zsbttl "RNOTXT == text record’; 


USF Lipsaworat a's 
RNOV AT = fit 


TINY UNTER ! record type 
$: RNOTKT “(OR TH SHORT_INTEGERS ! Length of data portion 
LITERAL 
i < RNOTXT_BASELEN = SFIELD set SIZE ' Size in FULLWORDS 
FLIP k “RNOTAT “BASESIZ = ZUPVAL#SFIELD_SET_SIZE; 
Size in UNITS 
1ELD 
SFLIPSRNOTAT FIELDS2= ET 
FILLER $SUB BLOCK CF 1S RNOTXT_BASELEN) J, 
ion. RNOTAT “Text $SUB"BLOCK(1000)J~ =! TEXT segment 
LITERAL 
LIPSK_RNOTXT_LENGTH = SFIELD_SET_SIZE, ! Size in FULLWORDS 


FLIPSK-RNOTXT_SIZE = XUPVAL*SFIELB_SET_SIZE;! Size in UNITS 


CRO 
SFLIP a S. Py oexe ett IP$K_RNOTXT_LENGTH] FIELD(SFLIPSRNOTXT_FIELDS1, 


PSRNOTXT_FIELDS2) 2; 


! En 
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Zsbttl *TOCTXT == TOC text record’; 


SFIELD 
FLIPSTOCTXT_FIELDS1= 
TOCTXT_CODE . Thy. INTEGER], ' record type 
TOCTXT_MAJOR = ($1 GERJ, ! major code 
TOCTXT“MINOR = = STINY” INTEGER). i minor code 
on TOCTXT-LENGTH = CSINTEGER] ! Length of data portion 
LITERAL 
FLIPSK_TOCTXT BASELEN = SFIELD SET SIZE Size in FULLWORDS 
FLIPSK-TOCTXT-BASESI2 = XUPVAL*SFIELD_SET SIZE 
Size in UNITS 
FIELD 
SFLipsroctay FIELDS2= SET 
TOCTXT_FILLER = £$SUB_BLOCK(FLIPSK_TOCTXT_BASELEN) J, 
x TOCTXT: “TEXT = [$SUB~BLOCK(1000))~ |! TEXT segment 
LITERAL 
LIPSK_TOCTXT_LENGTH = $FIELD SET SIZE, ! Size i 


n FU 
LIPSK-TOCTXT_SIZE = XUPVAL*SFIEL B_SET_SIZE;! Size in UN 


CRO 
SFLIP_TOCTXT = BLOCKCFL Py TOCTXT pam FIELD(SFLIPSTOCTXT_FIELDS1, 
SFLIPSTOCTXT_FIELDS2)% 


eee ee 
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| 
Zsbttl "TOCRD == TOC descriptor’; 


US SFLapsrocep FIELDS = 3 
TOCRD_CODE = (STINY_INTEGER), ' record type 
TOCRD “MAJOR = SiNTEGER,. ' major code 
es: TOCRD_MINOR = CSINTEGER ! alher code 
LITERAL 
FLIPSK_TOCRD_LENGTH = SFIELD SET SIZE, ! Size in FULL WORDS 
FLIPSK_TOCRD_SIZE = ZUPVAL*SFIELD_SET_SIZE; ! Size in UNITS 


0 
SFLIP_TOCRD = BLOCKCFLIPSK_TOCRD_LENGTH] FIELD(SFLIPSTOCRD_FIELDS)%; 


K 
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Zsbttl "TOCPAG == TOC page record’; 


1ELD 
SFLIPSTOCPAG. FIELDS = : A 
TINY_INTEGER]) ! Eegore type 

TOrPAg” RE No $SUB_BLOCK(PAGE_SCT Size) 


! page number segment 


TES; 
K-TOCPAG. PV 5_SET_SIZE;' Size in UNITS 
MACRO 


LITERAL 
FLIPSK_TOCPAG_LENGTH = SFIELD_ SET SIZE ! Size in A ee 
FLIPS SIZE = SUPVAL*$FIELB_SET 
SFLIP_TOCPAG = BLOCKCFLIPSK_TOCPAG_LENGTH) FIELD(SFLIPSTOCPAG_FIELDS)%; 
| 
| 
| 
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Zsbttl "TCXXIN <= index'; 


FIELD 
SFLipstcxxTN FIELDS = = PEt 
TCXXITN ~CODE TINY_INTEGER], ! record type 
inated arte 


EGER], ! 
$SUB _BLOCK (PAGE SCT SIZE) 
! page number segment 


TCXXTN_X 
TCXXTN_ “Sth 


TES; 
LITERAL 
LIPSK_TCXXTN_LENGTH 
FLIPSK> -TCXXTN_SIZE = 
MACR 


prgrecct ten type 


SFIELD SET Size. ! Size in FULLWORDS 
L*SFIEL NITS 


= $SFIELD 
ZUPVAL*SFIELB_SET_SIZE;! Size in UNIT 


SFLIP_TCXXTN = BLOCKCFLIPSK_TCXXTN_LENGTH] FIELD(SFLIPSTCXXTN_FIELDS)2; 


M 
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Zsbttl "TOCHLI == TOC header Level info record’; 


SFIELD 
FLIPS TOCA FIELDS 


= T 
“ = Pst an INTEGER) ! record type 
TOCHLITHLLIST = C$SUB_BLOCK(2+MAX_LEVELS)), 
' header level info 
TOCHLI_HLDSP = =_—« C$SUB_BLOCK(MAX_LEVELS) J 
! header level display info 
TES; 
LITERAL 
FLIPSK_TOCHLI_LENGTH = SFIELD_SET_SIZE, ' Size in FULLWORDS 
FLIPSK_TOCHLI_-SIZE = XUPVAL*SFIELB_SET_SIZE;! Size in UNITS 


MACRO 
SFLIP_TOCHLI = BLOCKCFLIPSK_TOCHLI_LENGTH] FIELD(SFLIPSTOCHLI_FIELDS)%; 


N 
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Zsbttl "TCXINI == Index Header record’; 


SFIELD 
SFLIPSTCXINI_ FIELDS = 4 
TCXINI_CODE = CSTINY_ INTEGER], ' record type 
= TCXINI-HEADER = CSINTEGER] ! TCX format indicator 
LITERAL 
FLIPSK_TCXINI_LENGTH = SFIELD_SET_SIZE, ! Size in FULLWORDS 
FLIPSK_TCXINI-SIZE = XUPVAL*SFIELD_SET_SIZE;! Size in UNITS 


MACRO 
SFLIP_TCXINI = BLOCKCFLIPSK_TCXINI_LENGTH] FIELD(SFLIPSTCXINI_FIELDS)%; 


FLIPRECS.REQ;1 


4 
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Zsbttl "TCXTXT == Index TEXT record’; 


1ELD 
SFLIPSTCATXT FIELDS! = 
TCXTXT ~C0D 


= 
ALIGN(FUL 
TCXTXT ENTRY = 
TCXTXT_ “yeee = 
TCXTXT_XTN = 
$; TCXTXT_BAR = 


LITERA 


STN INTEGER], ! record type 


! ENTRY flag 

' Length of data 

! transaction number 
! change bar flag 


ooo a 
PAM 
ee 
zz 
=—+—- 
mmm 
Oo 1 
mn 
zwwnD 
a 


L 
FLIPSK_TCXTXT_BASELEN = SFIELD_SET_SIZE ' Size in FULLWORDS 
FLIPSK_TCXTXT_BASESIZ = XUPVAL*SFIELD_SET_SIZE;! Size in UNITS 
IELD 
SFLIPSTCKIXT FIELDS2 = SET 
TCXTXT_DOMM = C$SUB_BLOCK(FLIPSK_ TCXTXT _BASELEN) J, 

—— TCXTXT “TEXT = C$SUBTBLOCK(1000)J~ =! text of entry 
LITERAL 

FLIPSK_TCXTXT_LENGTH = SFIELD SET SIZE, ' Size in FULLWORDS 

FLIPSK_TCXTXT_SIZE = XUPVAL*SFIELB_SET_SiZE;! Size in UNITS 
MACRO 

SFLIP_TCXTXT = BLOCKCFLIPSK_TCXTXT_LENGTH] FIELD(SFLIPSTCXTXT_FIELDS1, 

IPSTCXTXT_FIELDS2) 23 


oS 


4 
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Zsbttl "TOCHL == HL indicator record’; 


IELD 
SFLIPSTOCHL_FIELDS = sft 
Tess tN OE = ($TINY_INTEGER] ! record type 
LITERAL 
FLIPS$K_TOCHL_LENGTH = SFIELD_SET SIZE, ' Size in FULLWORDS 
FLIPSK_TOCHL_-SIZE = XUPVAL*SFIELB_SET_SIZE; ! Size in UNITS 
MA 


CRO 
SFLIP_TOCHL = BLOCKCFLIPSK_TOCHL_LENGTH] FIELD(SFLIPSTOCHL_FIELDS)%; 


faa 
_ 
~« 
m 
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